MIDIOutDevice
(Property)
Purpose: Returns and sets the current MIDI-out devices ID.
Syntax:
IntVar = CtlName.MIDIOutDevice
CtlName.MIDIOutDevice = IntVar
Arguments: None.
Example:
'Change MIDI-Out device
SoundCard1.MIDIOutDevice =
SoundCard1.MIDIOutNumOfDevices
'Play a MIDI-file
SoundCard1.MIDIPlay
"C:\Windows\Media\Passport.mid"
'Show Current MIDI-Out device in the Debug
Window
Debug.Print
SoundCard1.MIDIOutDevice
Comments: The SoundCard control will ignore attempts to set MIDIOutDevice to values out of range. Property can be changed even when MIDIOutput is open.
See Also:
MIDIInDevice